home *** CD-ROM | disk | FTP | other *** search
/ BCI NET / BCI NET Dec 94.iso / archives / programming / blitzbasic / blitz-list200994.lha / blitz-list / text0071.txt < prev    next >
Encoding:
Text File  |  1994-09-20  |  954 b   |  40 lines
  1. Hi all.
  2.  
  3. I am having a problem with loading IFF iamges into screens.
  4. When I load into a screen I get an anoying flash on the current screen.
  5. Any ideas anyone. Also has anyone found a QUICKER IFF loader. Speed is of
  6. the essence with my project and it gets realy bogged down with the current
  7. loader.
  8.  
  9. Here is a listing of my loader. Any ideas anyone?
  10.  
  11.    ; load or initialise a screen into S
  12.    USEPATH Events()
  13.    If Len(\_File)>0
  14.       ; Load image
  15.       ILBMInfo \_File
  16.       w.w=ILBMWidth
  17.       h.w=ILBMHeight
  18.       d.w=ILBMDepth
  19.       Id.l=ILBMViewMode
  20.       Free Window S : Free Screen S : Free BitMap S : Free GadgetList S
  21.       BitMap S,w,h,d
  22.       Screen S,0,800,w,h,d,Id,"",1,2,S
  23.       HideScreen S
  24.       ; Now Open Window onto Screen
  25.       Window S,0,0,w,h,$0900,"",1,2
  26.       LoadScreen S,\_File,S
  27.       Use Palette S
  28.       OK.b=True
  29.       MoveScreen S,0,-800
  30.    Else
  31.       OK.b=False
  32.    EndIf
  33.  
  34. Thanks in advance
  35. Tom Duncan
  36. duncan@usq.edu.au
  37.  
  38.  
  39.  
  40.